(map_char_table): Use XSETFASTINT.

diff --git a/src/fns.c b/src/fns.c
index 69bcb6f7d86ed895c09ca1c4f20b934c9849b50d..24c737141cc2d3d14c3b0cf8f33b6120c49719ec 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -1457,7 +1457,7 @@ map_char_table (c_function, function, subtable, arg, depth, indices)
     {
       Lisp_Object elt = XCHAR_TABLE (subtable)->contents[i];
 
-      indices[depth] = i;
+      XSETFASTINT (indices[depth], i);
 
       if (SUB_CHAR_TABLE_P (elt))
        {